﻿Public Class DiemTrungBinhBUS
    Public Sub LoadCBX(ByVal cbx As ComboBox, ByVal sql As String)
        Dim DTB_DAO As DiemTrungBinhDAO = New DiemTrungBinhDAO
        DTB_DAO.LoadCombobox(cbx, sql)
    End Sub
    Public Sub LoadDGV(ByVal dgv As DataGridView, ByVal sql As String)
        Dim DTB_DAO As DiemTrungBinhDAO = New DiemTrungBinhDAO
        DTB_DAO.LoadGridView(dgv, sql)
    End Sub
    Public Function ThemDTB(ByVal dtbInsert As DiemTBDTO) As Boolean
        Dim DTB_DAO As DiemTrungBinhDAO = New DiemTrungBinhDAO
        Return DTB_DAO.ThemDTB(dtbInsert)
    End Function
    Public Function XoaDTB(ByVal maHocSinh As String) As Boolean
        Dim DTB_DAO As DiemTrungBinhDAO = New DiemTrungBinhDAO
        Return DTB_DAO.XoaDTB(maHocSinh)
    End Function
    Public Function SuaDTB(ByVal dtbUpdate As DiemTBDTO) As Boolean
        Dim DTB_DAO As DiemTrungBinhDAO = New DiemTrungBinhDAO
        Return DTB_DAO.SuaDTB(dtbUpdate)
    End Function
End Class
